From: Glenn Morris <rgm@gnu.org>
Date: Fri, 10 Jan 2014 07:26:04 +0000 (-0800)
Subject: Tweak previous info.el change
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~1589^2~13
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=94ffb4b20eab1e4584e2aa72d2d2ffb1555de70c;p=emacs.git

Tweak previous info.el change
---

diff --git a/lisp/info.el b/lisp/info.el
index b8e30fadef3..74bdef5b050 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -737,8 +737,9 @@ in `Info-file-supports-index-cookies-list'."
       (and path
 	   installation-directory
 	   (let ((dir (expand-file-name "info/" installation-directory)))
-	     (setq Info-directory-list (delete dir Info-directory-list))
-	     (push dir Info-directory-list)))
+	     (when (file-directory-p dir)
+	       (setq Info-directory-list (delete dir Info-directory-list))
+	       (push dir Info-directory-list))))
       ;; For a self-contained (ie relocatable) NS build, AFAICS we
       ;; always want the included info directory to be at the head of
       ;; the search path, unless it's already in INFOPATH somewhere.